From: Richard M. Stallman Date: Tue, 29 Apr 1997 02:07:34 +0000 (+0000) Subject: Bind C-x m, C-x 4 m, C-x 5 m to compose-mail... X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~81477 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=6d64bc9f99ab79e36b17cc4d08e9bc7c6d132d76;p=emacs.git Bind C-x m, C-x 4 m, C-x 5 m to compose-mail... --- diff --git a/lisp/bindings.el b/lisp/bindings.el index 40a9ae1b7df..dc651212399 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -485,6 +485,10 @@ for \\[find-tag] (which see)." (define-key esc-map "\t" 'lisp-complete-symbol) (define-key ctl-x-map "\C-e" 'eval-last-sexp) + +(define-key ctl-x-map "m" 'compose-mail) +(define-key ctl-x-4-map "m" 'compose-mail-other-window) +(define-key ctl-x-5-map "m" 'compose-mail-other-frame) (define-key ctl-x-map "r\C-@" 'point-to-register) (define-key ctl-x-map [?r ?\C-\ ] 'point-to-register)